object FormCompanies: TFormCompanies
  Left = 297
  Top = 137
  Width = 964
  Height = 497
  Caption = #1057#1087#1080#1089#1086#1082' '#1074#1089#1077#1093' '#1087#1086#1089#1090#1072#1074#1097#1080#1082#1086#1074
  Color = clBtnFace
  Constraints.MinHeight = 250
  Constraints.MinWidth = 790
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnKeyUp = FormKeyUp
  DesignSize = (
    948
    459)
  PixelsPerInch = 96
  TextHeight = 13
  object lbl1: TLabel
    Left = 8
    Top = 6
    Width = 80
    Height = 16
    Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl2: TLabel
    Left = 248
    Top = 6
    Width = 119
    Height = 16
    Caption = #1042#1080#1076' '#1076#1077#1103#1090#1077#1083#1100#1085#1086#1089#1090#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object lbl3: TLabel
    Left = 488
    Top = 6
    Width = 39
    Height = 16
    Caption = #1043#1086#1088#1086#1076
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object CBActive: TCheckBox
    Left = 703
    Top = 8
    Width = 249
    Height = 20
    Alignment = taLeftJustify
    Anchors = [akTop, akRight]
    BiDiMode = bdLeftToRight
    Caption = #1058#1086#1083#1100#1082#1086' '#1085#1077#1091#1076#1072#1083#1077#1085#1085#1099#1077' '#1087#1086#1089#1090#1072#1074#1097#1080#1082#1080
    Checked = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentBiDiMode = False
    ParentFont = False
    State = cbChecked
    TabOrder = 1
    OnClick = CBActiveClick
  end
  object BitBtnInsert: TBitBtn
    Left = 4
    Top = 432
    Width = 149
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1053#1086#1074#1099#1081' '#1087#1086#1089#1090#1072#1074#1097#1080#1082' (F3)'
    TabOrder = 3
    OnClick = BitBtnInsertClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000003232
      3200FFFFFF000E0E0E0000501900E2E2E200E1E1E100E0E0E000DFDFDF00DEDE
      DE00DDDDDD00DCDCDC003DB90000B1FFB100DBDBDB0034F5670000B93D00DADA
      DA002FF26400D9D9D900D8D8D8008EFF8E0029EF610025ED5F0082F99600D7D7
      D7002DF163002AF061001BE0550012D34D00D6D6D6000FCE4A0021EB5B00D5D5
      D500D4D4D4001BE85800D3D3D30015E55500D2D2D200D1D1D100D0D0D0000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000282828282801
      0101010101010101010128282828280102020202020202020201282828280303
      0308212224262728020128282803101010041E2122242627020128282803251D
      100414191E222426020128030303231D10040404192122240201031F1F1F201C
      10101010041E21220201030D1A1B1A1C1C1D1D100414191E0201030C0D0D1516
      17181810041314190201280303030D12100404040B1113140201282828030D0F
      100408090A0B0E110201282828030C0D0C040708090A0B0E0201282828280303
      0405060708090A0B020128282828280102020202020202020201282828282801
      0101010101010101010128282828282828282828282828282828}
  end
  object BitBtnUpdate: TBitBtn
    Left = 168
    Top = 432
    Width = 105
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1048#1089#1087#1088#1072#1074#1080#1090#1100'(F4)'
    TabOrder = 4
    OnClick = BitBtnUpdateClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000000000
      80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
      A600D4F0FF00B1E2FF008ED4FF006BC6FF0048B8FF0025AAFF0000AAFF000092
      DC00007AB90000629600004A730000325000D4E3FF00B1C7FF008EABFF006B8F
      FF004873FF002557FF000055FF000049DC00003DB90000319600002573000019
      5000D4D4FF00B1B1FF008E8EFF006B6BFF004848FF002525FF000000FF000000
      DC000000B900000096000000730000005000E3D4FF00C7B1FF00AB8EFF008F6B
      FF007348FF005725FF005500FF004900DC003D00B90031009600250073001900
      5000F0D4FF00E2B1FF00D48EFF00C66BFF00B848FF00AA25FF00AA00FF009200
      DC007A00B900620096004A00730032005000FFD4FF00FFB1FF00FF8EFF00FF6B
      FF00FF48FF00FF25FF00FF00FF00DC00DC00B900B90096009600730073005000
      5000FFD4F000FFB1E200FF8ED400FF6BC600FF48B800FF25AA00FF00AA00DC00
      9200B9007A009600620073004A0050003200FFD4E300FFB1C700FF8EAB00FF6B
      8F00FF487300FF255700FF005500DC004900B9003D0096003100730025005000
      1900FFD4D400FFB1B100FF8E8E00FF6B6B00FF484800FF252500FF000000DC00
      0000B9000000960000007300000050000000FFE3D400FFC7B100FFAB8E00FF8F
      6B00FF734800FF572500FF550000DC490000B93D000096310000732500005019
      0000FFF0D400FFE2B100FFD48E00FFC66B00FFB84800FFAA2500FFAA0000DC92
      0000B97A000096620000734A000050320000FFFFD400FFFFB100FFFF8E00FFFF
      6B00FFFF4800FFFF2500FFFF0000DCDC0000B9B9000096960000737300005050
      0000F0FFD400E2FFB100D4FF8E00C6FF6B00B8FF4800AAFF2500AAFF000092DC
      00007AB90000629600004A73000032500000E3FFD400C7FFB100ABFF8E008FFF
      6B0073FF480057FF250055FF000049DC00003DB9000031960000257300001950
      0000D4FFD400B1FFB1008EFF8E006BFF6B0048FF480025FF250000FF000000DC
      000000B90000009600000073000000500000D4FFE300B1FFC7008EFFAB006BFF
      8F0048FF730025FF570000FF550000DC490000B93D0000963100007325000050
      1900D4FFF000B1FFE2008EFFD4006BFFC60048FFB80025FFAA0000FFAA0000DC
      920000B97A000096620000734A0000503200D4FFFF00B1FFFF008EFFFF006BFF
      FF0048FFFF0025FFFF0000FFFF0000DCDC0000B9B90000969600007373000050
      5000F2F2F200E6E6E600DADADA00CECECE00C2C2C200B6B6B600AAAAAA009E9E
      9E0092929200868686007A7A7A006E6E6E0062626200565656004A4A4A003E3E
      3E0032323200262626001A1A1A000E0E0E00F0FBFF00A4A0A000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00E5E5E5E5E5E5
      E5E5E5E5E5E5E5E5E5E5E5F5F5F5F5F5E5E5E5E5E5E5E5E5E5E5E5F5F0E5E9E9
      F5E5E5E5E5E5E5E5E5E5E5F5FFE3E61111F5E5E5E5E5E5E5E5E5E5F5E3E61113
      0F11F5E5E5E5E5E5E5E5E5F5E70D120F130F11F5E5E5E5E5E5E5E5E5F5100C12
      0F130F11F5E5E5E5E5E5E5E5E5F5100B120F130F11F5E5E5E5E5E5E5E5E5F510
      0C120F130FA4F5E5E5E5E5E5E5E5E5F5100B120FA3A4A4F5E5E5E5E5E5E5E5E5
      F5100CAEA3121E1EF5E5E5E5E5E5E5E5E5F511AD1D1E19191DF5E5E5E5E5E5E5
      E5E5F5A31E192A1C1DF5E5E5E5E5E5E5E5E5E5F51A181C1C1EF5E5E5E5E5E5E5
      E5E5E5E5F51D1C1EF5E5E5E5E5E5E5E5E5E5E5E5E5F5F5F5E5E5}
  end
  object BitBtnDelete: TBitBtn
    Left = 288
    Top = 432
    Width = 137
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1059#1076#1072#1083#1080#1090#1100' '#1087#1086#1089#1090#1072#1074#1097#1080#1082#1072
    TabOrder = 5
    OnClick = BitBtnDeleteClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000003232
      3200FFFFFF00E2E2E200E0E0E000DFDFDF00DEDEDE00DDDDDD00DCDCDC00DBDB
      DB000E0E0E0004064C00DADADA00D9D9D900B3B5FB006B6FF7006D71F7001A1A
      1A00787CF8004348F5007377F800D8D8D8000E14F3002B31F4009B9EFA005A5E
      F6007A7DF8002127F3002329F400D7D7D7000C12E4002C31F4006F73F800454A
      F5000C12DD00D6D6D600494EF6001B21F300181EF300D5D5D5008689F900676B
      F7001016F3000B10D3000D13F0001F25F3000B10C800D4D4D4003237F4000A0F
      BC000C12D5000C12E600D3D3D300090DA2000A0FB8000B10CD0012157A00D2D2
      D200D1D1D100D0D0D00000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003B3B3B3B3B01
      010101010101010101013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      0223272F34393A3B02013B0A0A3B3B010B0B23272F34393A02010A35360A3B00
      37380B23272F343902010A302231003233220B1D23272F3402010A28292A2B2C
      2D2E0B151D23272F02013B0A24171625260B090C0D1D232702013B0A1E1F2021
      220B08090C151D2302010A162018191A1B2E0B08090D151D02010A2018101112
      1A1B0B07080C0D1502010A0E0F113B1113140B0607090C0D02013B0A0A3B3B01
      0B0B05050607080902013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      010101010101010101013B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B}
  end
  object BitBtnClose: TBitBtn
    Left = 832
    Top = 432
    Width = 77
    Height = 25
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = #1047#1072#1082#1088#1099#1090#1100
    Default = True
    ModalResult = 1
    TabOrder = 6
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000}
    NumGlyphs = 2
  end
  object DBGridCompanies: TDBGridEh
    Left = 8
    Top = 40
    Width = 685
    Height = 379
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataSource = DSCompanies
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    RowLines = 3
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    TitleLines = 2
    OnDblClick = DBGridCompaniesDblClick
    OnDrawColumnCell = DBGridCompaniesDrawColumnCell
    OnTitleClick = DBGridCompaniesTitleClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'CM_NAME'
        Footers = <>
        STFilter.DataField = 'CM_NAME'
        STFilter.KeyField = 'CM_NAME'
        STFilter.ListField = 'CM_NAME'
        Title.Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082
        Width = 140
      end
      item
        EditButtons = <>
        FieldName = 'CM_CITY'
        Footers = <>
        STFilter.KeyField = 'CM_CITY'
        STFilter.ListField = 'CM_CITY'
        Title.Caption = #1043#1086#1088#1086#1076
        Width = 90
      end
      item
        EditButtons = <>
        FieldName = 'CM_TRUNC_COMMENT'
        Footers = <>
        STFilter.KeyField = 'CM_TRUNC_COMMENT'
        STFilter.ListField = 'CM_TRUNC_COMMENT'
        Title.Caption = #1040#1076#1088#1077#1089
        Width = 194
      end
      item
        EditButtons = <>
        FieldName = 'TL_NAME'
        Footers = <>
        STFilter.KeyField = 'TL_NAME'
        STFilter.ListField = 'TL_NAME'
        Title.Caption = #1044#1086#1074#1077#1088#1080#1077
        Width = 81
      end
      item
        EditButtons = <>
        FieldName = 'CM_BUSINESS'
        Footers = <>
        Title.Caption = #1044#1077#1103#1090#1077#1083#1100#1085#1086#1089#1090#1100
        Width = 100
      end
      item
        EditButtons = <>
        FieldName = 'SISCLOSED'
        Footers = <>
        STFilter.KeyField = 'SISCLOSED'
        STFilter.ListField = 'SISCLOSED'
        Title.Caption = #1059#1076#1072#1083#1077#1085'?'
        Width = 54
      end
      item
        ButtonStyle = cbsEllipsis
        Checkboxes = False
        EditButtons = <>
        FieldName = 'CM_HYPERLINK'
        Footers = <>
        STFilter.Visible = False
        Title.Caption = #1055#1088#1072#1081#1089'-'#1083#1080#1089#1090
        Width = 30
      end>
  end
  object DBGridPhones: TDBGridEh
    Left = 700
    Top = 32
    Width = 249
    Height = 385
    Anchors = [akTop, akRight, akBottom]
    DataSource = DSPhones
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    TitleLines = 2
    Columns = <
      item
        EditButtons = <>
        FieldName = 'PH_STR'
        Footers = <>
        Title.Caption = #1058#1077#1083#1077#1092#1086#1085
        Width = 74
      end
      item
        EditButtons = <>
        FieldName = 'PH_COMMENT'
        Footers = <>
        Title.Caption = #1050#1086#1085#1090#1072#1082#1090#1085#1086#1077' '#1083#1080#1094#1086' '#1087#1086#1089#1090#1072#1074#1097#1080#1082#1072
        Width = 94
      end
      item
        EditButtons = <>
        FieldName = 'SISCLOSED'
        Footers = <>
        Title.Caption = #1059#1076#1072#1083#1077#1085'?'
        Width = 54
      end>
  end
  object BitBtnNewPhone: TBitBtn
    Left = 428
    Top = 430
    Width = 141
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1053#1086#1074#1099#1081' '#1090#1077#1083#1077#1092#1086#1085' (F5)'
    TabOrder = 7
    OnClick = BitBtnNewPhoneClick
    Glyph.Data = {
      F6060000424DF606000000000000360000002800000018000000180000000100
      180000000000C0060000C40E0000C40E00000000000000000000FFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE4E4E4E5E5E5FFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDCDCDC7171715A5A5A5959
      596C6D6DCECECFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF797979
      808080E9E9E9D1C8C18253378B5B3BFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFF606060B4B4B4FFFFFFFFFFFFE15512E75801AB5D23EE7406FB8203
      FF8C04FF950DFF9A18FF9D1EFF9C1DFF9915FF920AFF8A03F97E03F27103EA63
      03E3590BFFFFFFFFFFFFFFFFFF656565B0B0B0FFFFFFFFFFFFE15C12E86404C0
      691EE9871FFE9E2AFFAD47FFB860FFC172FFC47AFFC377FFBC69FFB355FFA638
      FD961DF6830FEE6F06E6610AFFFFFFFFFFFFFFFFFF6C6C6CAAAAAAFFFFFFFFFF
      FFF07103F27704C16A19E57B14F78818F88D21F89128F9942EFA9430FA942EF9
      922AF98D23F88A1AF88410F67E08F47B04F27603FFFFFFFFFFFFFFFFFF777777
      A6A6A6FFFFFFFFFFFFEF7207E46304B75311D05C09EA6C06F77F04FA8503F58B
      19ECBB8EEFAE6FF09941EABB8EF09943EFB279EDBA8DF28211F77E03FFFFFFFF
      FFFFFFFFFF858585919191FFFFFFFFFFFFEE791DF57B07F28E19F99017F47F11
      F07A0EFE8E09F3922A000000000000EAA665000000000000E0BEA70000000000
      00F98303FFFFFFFFFFFFFFFFFFB0B0B0727272FFFFFFFFFFFFF27E15FA8F1DFD
      B35CFDAD4FF88A16F27F14FF9A1CFA9822EBC098EEB780F2A145E7C19CF19D41
      EEB67EEABD94F98C0CFD8A02FFFFFFFFFFFFFFFFFFB2B2B26A6A6AFFFFFFFFFF
      FFFB8D13FD8C05FE8B03FE8C03FC9215F18217FFA02BF79E33000000000000ED
      AB6A000000000000E2BBA0000000000000FF9005FFFFFFFFFFFFFFFFFFB7B7B7
      626262FFFFFFFFFFFFFF9919FF9C22FF991AFF9410FE9A20F28822FFA73BFBA5
      3CEEC39BEFBF91F2AD61EFC9A5F3A854EFBD8AEFBF91FC9617FF960FFFFFFFFF
      FFFFFFFFFFBDBDBD5C5C5CFFFFFFFFFFFFFF9F25FFA637FFA535FF9F27FEA230
      F3902EFFAE49F9AA4B000000000000ECB077000000000000E1BEA50000000000
      00FF9D1CFFFFFFFFFFFFFFFFFFC6C6C6575757FFFFFFFFFFFFFFA530FFAF4CFF
      AE48FFAC44FEA93FF49637FFB457FCB356EDC7A5EDC6A0F2B676EBCCAFF2B26B
      EDC6A1EDC198FDA02CFFA429FFFFFFFFFFFFFFFFFFE6E6E65C5C5CFFFFFFFFFF
      FFFFAC3CFFB860FFB65CFFB75CFFB252F59D43FFBB64FBB763000000000000EB
      B582000000000000E0BFAB000000000000FFA934FFFFFFFFFFFFFFFFFFFFFFFF
      A4A4A4FFFFFFFFFFFFFFB146FFC172FFBF6EFFBF6FFFBD68F6A44DFFC171FFC1
      72FEBE6FFEBE6FFFC070FDBC6BFFBE6BFEB964FEB760FFB85EFFAF45FFFFFFFF
      FFFFFFFFFFFFFFFFC0C0C0C3C3C3FFFFFFFFB54FFFC883FFC780FFC880FFC67D
      F7AA56FFC67EFFC77FFFC77FFFC77FFFC67DFFC57BFFC378FFC274FFC06FFFBD
      6AFDB152FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA5A5A5968B7CFFB857FFD093FF
      CF91FFCF92FFCD8EF8B163FFCC8AFFCA87FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFC274EDB05EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE1DD
      D8FFBC60FFD6A1FFD6A1FFD7A2FFD59EF7B771FFD196FFCE8DFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC77EEAB56CFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFB95BFFDDB0FFDEB4FFDFB5FFDCAEF8BD7CFFD6A1FFD5
      A0F2BD7CF3C68DF7CC9BF8CE9EF5C78FF1BD7BF3B96DFFCB89E1B77AFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1B564FBA74BFBB05DFBB262FBB05E
      FDC583FFD298FFD49CFFD49DFFD49DFFD49BFFD297FFD093FFCE8DFFCB87FFC3
      74EECFA2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
  end
  object BitBtnClosePhone: TBitBtn
    Left = 576
    Top = 430
    Width = 121
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1059#1076#1072#1083#1080#1090#1100' '#1090#1077#1083#1077#1092#1086#1085
    TabOrder = 8
    OnClick = BitBtnClosePhoneClick
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000003232
      3200FFFFFF00E2E2E200E0E0E000DFDFDF00DEDEDE00DDDDDD00DCDCDC00DBDB
      DB000E0E0E0004064C00DADADA00D9D9D900B3B5FB006B6FF7006D71F7001A1A
      1A00787CF8004348F5007377F800D8D8D8000E14F3002B31F4009B9EFA005A5E
      F6007A7DF8002127F3002329F400D7D7D7000C12E4002C31F4006F73F800454A
      F5000C12DD00D6D6D600494EF6001B21F300181EF300D5D5D5008689F900676B
      F7001016F3000B10D3000D13F0001F25F3000B10C800D4D4D4003237F4000A0F
      BC000C12D5000C12E600D3D3D300090DA2000A0FB8000B10CD0012157A00D2D2
      D200D1D1D100D0D0D00000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      00000000000000000000000000000000000000000000000000003B3B3B3B3B01
      010101010101010101013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      0223272F34393A3B02013B0A0A3B3B010B0B23272F34393A02010A35360A3B00
      37380B23272F343902010A302231003233220B1D23272F3402010A28292A2B2C
      2D2E0B151D23272F02013B0A24171625260B090C0D1D232702013B0A1E1F2021
      220B08090C151D2302010A162018191A1B2E0B08090D151D02010A2018101112
      1A1B0B07080C0D1502010A0E0F113B1113140B0607090C0D02013B0A0A3B3B01
      0B0B05050607080902013B3B3B3B3B01020202020202020202013B3B3B3B3B01
      010101010101010101013B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B}
  end
  object btnShowPrice: TBitBtn
    Left = 704
    Top = 430
    Width = 105
    Height = 25
    Anchors = [akLeft, akBottom]
    Caption = #1055#1088#1072#1081#1089'-'#1083#1080#1089#1090
    TabOrder = 9
    OnClick = btnShowPriceClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000232E0000232E00001000000000000000FFFFFF008080
      80000000000000800000C0C0C000006850000704780050070400000000000000
      00000000900055090400E07C2600040800000000200000000000000000000000
      0000000222222222222200010000000000020001044444444402000104000440
      4002000104000444400200010444444040023333333300400002300011130040
      0002311101034444400230101103004000023001110300400002311111034444
      2222300000030000042033333333000042000001000000002000}
  end
  object edtCompany: TEdit
    Left = 88
    Top = 4
    Width = 153
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    OnExit = edtCompanyExit
  end
  object edtBusiness: TEdit
    Left = 368
    Top = 4
    Width = 113
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
    OnExit = edtBusinessExit
  end
  object edtCity: TEdit
    Left = 536
    Top = 4
    Width = 137
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 12
    OnExit = edtCityExit
  end
  object QCompanies: TZQuery
    Connection = FormMain.ZC
    AfterScroll = QCompaniesAfterScroll
    OnCalcFields = QCompaniesCalcFields
    SQL.Strings = (
      'SELECT cm_id as COMPANYID, cm_name, cm_city, c.cm_comment,'
      'c.cm_isclosed, c.CM_HYPERLINK, CM_BUSINESS,'
      ' c.cm_owner, tl.tl_level, tl.tl_color, tl.tl_name'
      'FROM company c'
      'left join TRUSTLEVEL tl on tl.tl_id = c.cm_trust'
      'WHERE ((cm_id = :COMPANYID) or (:COMPANYID = -1) )'
      'and cm_isclosed = :ISCLOSED'
      
        'and ((upper(cm_name COLLATE WIN1251) like '#39'%'#39'||upper(:company)||' +
        #39'%'#39') or (cast(:company as varchar(100)) ='#39#39') )'
      
        'and (upper(cm_city) like upper('#39'%'#39'||:CITY||'#39'%'#39') or (cast(:CITY a' +
        's varchar(100))  = '#39#39'))'
      
        'and ((UPPER(cm_business COLLATE WIN1251) like '#39'%'#39'||upper(:busine' +
        'ss)||'#39'%'#39' ) or (cast(:business as varchar(100)) ='#39#39') )'
      'order by c.cm_name'
      ' '
      ' '
      ' ')
    Params = <
      item
        DataType = ftUnknown
        Name = 'COMPANYID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ISCLOSED'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'company'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'CITY'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'business'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 96
    Top = 120
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'COMPANYID'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'ISCLOSED'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'company'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'CITY'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'business'
        ParamType = ptUnknown
      end>
    object QCompaniesSISCLOSED: TStringField
      FieldKind = fkCalculated
      FieldName = 'SISCLOSED'
      Calculated = True
    end
    object QCompaniesCM_TRUNC_COMMENT: TStringField
      FieldKind = fkCalculated
      FieldName = 'CM_TRUNC_COMMENT'
      Size = 1024
      Calculated = True
    end
    object QCompaniesCM_NAME: TStringField
      FieldName = 'CM_NAME'
      Size = 100
    end
    object QCompaniesCOMPANYID: TIntegerField
      FieldName = 'COMPANYID'
      Required = True
    end
    object QCompaniesCM_HYPERLINK: TStringField
      FieldName = 'CM_HYPERLINK'
      Size = 1000
    end
    object QCompaniesCM_COMMENT: TStringField
      FieldName = 'CM_COMMENT'
      Size = 255
    end
    object QCompaniesCM_ISCLOSED: TIntegerField
      FieldName = 'CM_ISCLOSED'
    end
    object QCompaniesCM_OWNER: TIntegerField
      FieldName = 'CM_OWNER'
      Required = True
    end
    object QCompaniesCM_CITY: TStringField
      FieldName = 'CM_CITY'
      Size = 100
    end
    object QCompaniesTL_LEVEL: TIntegerField
      FieldName = 'TL_LEVEL'
    end
    object QCompaniesTL_COLOR: TIntegerField
      FieldName = 'TL_COLOR'
      Required = True
    end
    object QCompaniesTL_NAME: TStringField
      FieldName = 'TL_NAME'
      Size = 100
    end
    object strngfldQCompaniesCM_BUSINESS: TStringField
      FieldName = 'CM_BUSINESS'
      Size = 100
    end
  end
  object DSCompanies: TDataSource
    DataSet = QCompanies
    Left = 176
    Top = 120
  end
  object QPhones: TZQuery
    Connection = FormMain.ZC
    OnCalcFields = QPhonesCalcFields
    SQL.Strings = (
      'select p.ph_id, p.ph_comment, p.ph_isclosed,'
      'p.ph_datebegin,u.u_login||'#39' '#39'||u.u_fio as username'
      'from phones p, phones_companies pc, users u'
      'where p.ph_id=pc.pc_phid'
      'and u.u_id=pc.pc_uid'
      'and pc.pc_company=:COMPANYID'
      'order by p.ph_isclosed, p.ph_id')
    Params = <
      item
        DataType = ftUnknown
        Name = 'COMPANYID'
        ParamType = ptUnknown
      end>
    WhereMode = wmWhereAll
    Options = []
    Left = 536
    Top = 104
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'COMPANYID'
        ParamType = ptUnknown
      end>
    object QPhonesPH_COMMENT: TStringField
      FieldName = 'PH_COMMENT'
      Size = 100
    end
    object QPhonesPH_DATEBEGIN: TDateField
      FieldName = 'PH_DATEBEGIN'
    end
    object QPhonesUSERNAME: TStringField
      FieldName = 'USERNAME'
      ReadOnly = True
      Size = 81
    end
    object QPhonesPH_ID: TLargeintField
      FieldName = 'PH_ID'
      Required = True
    end
    object QPhonesPH_STR: TStringField
      FieldKind = fkCalculated
      FieldName = 'PH_STR'
      Calculated = True
    end
    object QPhonesWHO_WHERE: TStringField
      FieldKind = fkCalculated
      FieldName = 'WHO_WHERE'
      Calculated = True
    end
    object QPhonesPH_ISCLOSED: TSmallintField
      FieldName = 'PH_ISCLOSED'
      Required = True
    end
    object QPhonesSISCLOSED: TStringField
      FieldKind = fkCalculated
      FieldName = 'SISCLOSED'
      Calculated = True
    end
  end
  object DSPhones: TDataSource
    AutoEdit = False
    DataSet = QPhones
    Left = 624
    Top = 104
  end
end
